       01  W-PTRO-OFFSET-FILLS.
           03                          PIC X(36)   VALUE
               '003072009000029396003072010000053487'.
           03                          PIC X(36)   VALUE
               '003072011000036166003082009000019660'.
           03                          PIC X(36)   VALUE
               '003082010000020841003082011000021215'.
           03                          PIC X(36)   VALUE
               '003082012000020187003082013000018936'.
           03                          PIC X(36)   VALUE
               '003082014000022595003082015000022766'.
           03                          PIC X(36)   VALUE
               '003772009000014871003772010000013972'.
           03                          PIC X(36)   VALUE
               '003772011000012933003772012000012297'.
           03                          PIC X(36)   VALUE
               '003772013000013063003772014000027456'.
           03                          PIC X(36)   VALUE
               '003772015000027795003782009000005937'.
           03                          PIC X(36)   VALUE
               '003782010000005613003782011000005605'.
           03                          PIC X(36)   VALUE
               '003782012000005452003782013000005695'.
           03                          PIC X(36)   VALUE
               '003782014000007433003782015000007437'.
           03                          PIC X(36)   VALUE
               '003892009000004642003892010000003889'.
           03                          PIC X(36)   VALUE
               '003892011000003038003892012000003811'.
           03                          PIC X(36)   VALUE
               '003892013000003603003892014000004156'.
           03                          PIC X(36)   VALUE
               '003892015000006102003902009000003260'.
           03                          PIC X(36)   VALUE
               '003902010000003585003902011000003225'.
           03                          PIC X(36)   VALUE
               '003902012000003048003902013000003976'.
           03                          PIC X(36)   VALUE
               '003902014000004629003902015000005834'.
           03                          PIC X(36)   VALUE
               '003912009000006620003912010000006452'.
           03                          PIC X(36)   VALUE
               '003912011000006499003912012000006409'.
           03                          PIC X(36)   VALUE
               '003912013000006881003912014000008264'.
           03                          PIC X(36)   VALUE
               '003912015000008243003922009000003864'.
           03                          PIC X(36)   VALUE
               '003922010000005258003922011000004440'.
           03                          PIC X(36)   VALUE
               '003922012000003078003922013000005249'.
           03                          PIC X(36)   VALUE
               '003922014000007131003922015000007391'.
           03                          PIC X(36)   VALUE
               '003932009000018065003932010000017114'.
           03                          PIC X(36)   VALUE
               '003932011000017652003932012000019243'.
           03                          PIC X(36)   VALUE
               '003932013000016717003932014000030120'.
           03                          PIC X(36)   VALUE
               '003932015000032170003942009000004218'.
           03                          PIC X(36)   VALUE
               '003942010000004026003942011000003945'.
           03                          PIC X(36)   VALUE
               '003942012000003755003942013000003873'.
           03                          PIC X(36)   VALUE
               '003942014000004638003942015000004607'.
           03                          PIC X(36)   VALUE
               '003952009000003457003952010000003677'.
           03                          PIC X(36)   VALUE
               '003952011000003606003952012000003839'.
           03                          PIC X(36)   VALUE
               '003952013000004026003952014000005041'.
           03                          PIC X(36)   VALUE
               '003952015000005081003962009000002428'.
           03                          PIC X(36)   VALUE
               '003962010000002505003962011000002249'.
           03                          PIC X(36)   VALUE
               '003962012000002308003962013000002447'.
           03                          PIC X(36)   VALUE
               '003962014000002880003962015000002888'.
           03                          PIC X(36)   VALUE
               '003972009000003838003972010000004293'.
           03                          PIC X(36)   VALUE
               '003972011000005353003972012000003379'.
           03                          PIC X(36)   VALUE
               '003972013000005868003982009000006279'.
           03                          PIC X(36)   VALUE
               '003982010000006244003982011000005930'.
           03                          PIC X(36)   VALUE
               '003982012000006532003982013000006004'.
           03                          PIC X(36)   VALUE
               '003982014000007329003982015000006892'.
           03                          PIC X(36)   VALUE
               '004002009000005257004002010000005125'.
           03                          PIC X(36)   VALUE
               '004002011000004056004002012000004427'.
           03                          PIC X(36)   VALUE
               '004002013000004916004002014000006141'.
           03                          PIC X(36)   VALUE
               '004002015000006298004012009000003513'.
           03                          PIC X(36)   VALUE
               '004012010000003600004012011000003029'.
           03                          PIC X(36)   VALUE
               '004012012000003466004012013000003155'.
           03                          PIC X(36)   VALUE
               '004012014000004336004012015000004309'.
           03                          PIC X(36)   VALUE
               '004022009000029674004022010000030940'.
           03                          PIC X(36)   VALUE
               '004022011000033707004022012000033177'.
           03                          PIC X(36)   VALUE
               '004022013000018769004022014000024430'.
           03                          PIC X(36)   VALUE
               '004022015000026302004032009000003876'.
           03                          PIC X(36)   VALUE
               '004032010000003917004032011000007308'.
           03                          PIC X(36)   VALUE
               '004032012000007640004032013000008879'.
           03                          PIC X(36)   VALUE
               '004032014000002034004032015000002488'.
           03                          PIC X(36)   VALUE
               '004042009000010630004042010000010236'.
           03                          PIC X(36)   VALUE
               '004042011000010425004042012000010241'.
           03                          PIC X(36)   VALUE
               '004042013000010370004042014000012790'.
           03                          PIC X(36)   VALUE
               '004042015000013070004062009000006441'.
           03                          PIC X(36)   VALUE
               '004062010000004864004062011000005361'.
           03                          PIC X(36)   VALUE
               '004062012000004332004062013000005192'.
           03                          PIC X(36)   VALUE
               '004062014000007533004062015000008094'.
           03                          PIC X(36)   VALUE
               '004082009000068312004082010000058641'.
           03                          PIC X(36)   VALUE
               '004082011000048344004082012000059524'.
           03                          PIC X(36)   VALUE
               '004082013000053619004082014000077073'.
           03                          PIC X(36)   VALUE
               '004082015000081108004142009000033136'.
           03                          PIC X(36)   VALUE
               '004142010000026843004142011000022847'.
           03                          PIC X(36)   VALUE
               '004142012000024170004142013000024278'.
           03                          PIC X(36)   VALUE
               '004142014000032553004142015000037358'.
           03                          PIC X(36)   VALUE
               '055912016000004534055922016000011886'.
           03                          PIC X(36)   VALUE
               '055932016000029640055942016000022837'.
       01  W-PTRO-OFFSET-TABLE REDEFINES W-PTRO-OFFSET-FILLS.
           03  PTRO-ENTRY OCCURS 152 TIMES
                   ASCENDING KEY IS PTRO-NUCMED-APC
                   INDEXED BY PTRO-INDX.
               05  PTRO-NUCMED-APC     PIC X(5).
               05  PTRO-EFF-YEAR       PIC 9(4).
               05  PTRO-OFFSET-AMT     PIC 9(7)V99.
       01  PTRO-MAX                    PIC S9(7)   COMP-3
                                       VALUE +152.
